home *** CD-ROM | disk | FTP | other *** search
/ Developer CD Series 1996 February: Tool Chest / Apple Developer CD Series Tool Chest February 1996 (Apple Computer)(1996).iso / Tool Chest / Development Tools & Languages / • Other Platforms / PCCTS 1.31 / lang / Pascal / ttree.h < prev   
Encoding:
C/C++ Source or Header  |  1995-03-10  |  621 b   |  24 lines  |  [TEXT/MPS ]
  1. /*      Code to manage type trees for each type
  2.  *  These trees then can be used to determine whether varibles have the
  3.  *  same type.
  4.  *
  5.  *  Will Cohen
  6.  *  12/18/90
  7.  */
  8.  
  9. #define tnode   struct _tnode_
  10. tnode {
  11.     tnode    *down,*right;    /* everything in child-sibling tree */
  12.     int    n_type;        /* indicates what kind of node this is */
  13. };
  14.  
  15. /* types of tnodes */
  16.  
  17.  
  18. /* functions */
  19. extern int compatible(/*t1,t2*/);    /* returns 0 for incompatible, 1 for */
  20.                     /*  compatible */
  21. extern int acompatible(/*t1,t2*/);    /* returns 1 if can assigment okay */
  22.                     /* t1<-t2 */
  23. extern tnode   *new_tnode();        /* makes and fills in a tnode */
  24.